home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
IRIX 6.2 Development Libraries
/
SGI IRIX 6.2 Development Libraries.iso
/
dist
/
complib.idb
/
usr
/
share
/
catman
/
p_man
/
cat3
/
complib
/
dlapll.z
/
dlapll
Wrap
Text File
|
1996-03-14
|
2KB
|
67 lines
DDDDLLLLAAAAPPPPLLLLLLLL((((3333FFFF)))) DDDDLLLLAAAAPPPPLLLLLLLL((((3333FFFF))))
NNNNAAAAMMMMEEEE
DLAPLL - two column vectors X and Y, let A = ( X Y )
SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
SUBROUTINE DLAPLL( N, X, INCX, Y, INCY, SSMIN )
INTEGER INCX, INCY, N
DOUBLE PRECISION SSMIN
DOUBLE PRECISION X( * ), Y( * )
PPPPUUUURRRRPPPPOOOOSSSSEEEE
Given two column vectors X and Y, let
The subroutine first computes the QR factorization of A = Q*R, and then
computes the SVD of the 2-by-2 upper triangular matrix R. The smaller
singular value of R is returned in SSMIN, which is used as the
measurement of the linear dependency of the vectors X and Y.
AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
N (input) INTEGER
The length of the vectors X and Y.
X (input/output) DOUBLE PRECISION array,
dimension (1+(N-1)*INCX) On entry, X contains the N-vector X. On
exit, X is overwritten.
INCX (input) INTEGER
The increment between successive elements of X. INCX > 0.
Y (input/output) DOUBLE PRECISION array,
dimension (1+(N-1)*INCY) On entry, Y contains the N-vector Y. On
exit, Y is overwritten.
INCY (input) INTEGER
The increment between successive elements of Y. INCY > 0.
SSMIN (output) DOUBLE PRECISION
The smallest singular value of the N-by-2 matrix A = ( X Y ).
PPPPaaaaggggeeee 1111